home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
develop, the CD; issue 1
/
Apple_Develop_1989.bin
/
Offscreen
/
FracApp 2.0B3
/
FracApp
/
FracApp.rsrc
/
bin.rsrc_CODE_13_GWriteFile.txt
< prev
next >
Wrap
Text File
|
1989-10-13
|
56KB
|
989 lines
# near model CODE resource
# jump table entries: 2976-2988 (13 of them)
export_372:
00000000 4E56 0000 link A6, 0
00000004 2F0C move.l -[A7], A4
00000006 286E 0008 movea.l A4, [A6 + 0x8]
0000000A 2054 movea.l A0, [A4]
0000000C 3F28 0002 move.w -[A7], [A0 + 0x2]
00000010 2268 0004 movea.l A1, [A0 + 0x4]
00000014 2251 movea.l A1, [A1]
00000016 1029 0037 move.b D0, [A1 + 0x37]
0000001A 0A00 0001 xori.b D0, 0x1
0000001E 4A00 tst.b D0
00000020 660A bne +0xC /* 0000002C */
00000022 721E moveq.l D1, 0x1E
00000024 B268 0002 cmp.w D1, [A0 + 0x2]
00000028 56C1 sne D1
0000002A 8001 or.b D0, D1
label0000002C:
0000002C 0240 0001 andi.w D0, 0x1
00000030 1F00 move.b -[A7], D0
00000032 7021 moveq.l D0, 0x21
00000034 2054 movea.l A0, [A4]
00000036 B068 0002 cmp.w D0, [A0 + 0x2]
0000003A 57C0 seq D0
0000003C 4400 neg.b D0
0000003E 1F00 move.b -[A7], D0
00000040 2F28 0004 move.l -[A7], [A0 + 0x4]
00000044 4EBA 045A jsr [PC + 0x45A /* 000004A0 */]
00000048 285F movea.l A4, [A7]+
0000004A 4E5E unlink A6
0000004C 2E9F move.l [A7], [A7]+
0000004E 4E75 rts
export_373:
fn00000050:
00000050 4E56 0000 link A6, 0
00000054 4E5E unlink A6
00000056 205F movea.l A0, [A7]+
00000058 DEFC 0012 add.w A7, 0x12
0000005C 4ED0 jmp [A0]
0000005E 0000 4E56 ori.b D0, 0x56 /* 'V' */
export_374: // at 00000060 (misaligned)
00000062 0000 2F0C ori.b D0, 0xC
00000066 286E 0008 movea.l A4, [A6 + 0x8]
0000006A 2054 movea.l A0, [A4]
0000006C 1028 001E move.b D0, [A0 + 0x1E]
00000070 6708 beq +0xA /* 0000007A */
00000072 206E 0010 movea.l A0, [A6 + 0x10]
00000076 7078 moveq.l D0, 0x78
00000078 D190 add.l [A0], D0
label0000007A:
0000007A 2054 movea.l A0, [A4]
0000007C 1028 003A move.b D0, [A0 + 0x3A]
00000080 670A beq +0xC /* 0000008C */
00000082 206E 000C movea.l A0, [A6 + 0xC]
00000086 0690 0000 011E addi.l [A0], 0x11E
label0000008C:
0000008C 285F movea.l A4, [A7]+
0000008E 4E5E unlink A6
00000090 205F movea.l A0, [A7]+
00000092 DEFC 000C add.w A7, 0xC
00000096 4ED0 jmp [A0]
export_375:
00000098 4E56 FFFC link A6, -0x0004
0000009C 2F0C move.l -[A7], A4
0000009E 286E 0008 movea.l A4, [A6 + 0x8]
000000A2 2054 movea.l A0, [A4]
000000A4 1028 001E move.b D0, [A0 + 0x1E]
000000A8 672A beq +0x2C /* 000000D4 */
000000AA 2054 movea.l A0, [A4]
000000AC 4AA8 0020 tst.l [A0 + 0x20]
000000B0 6602 bne +0x4 /* 000000B4 */
000000B2 6020 bra +0x22 /* 000000D4 */
label000000B4:
000000B4 7078 moveq.l D0, 0x78
000000B6 2D40 FFFC move.l [A6 - 0x4], D0
000000BA 4267 clr.w -[A7]
000000BC 3F2E 000E move.w -[A7], [A6 + 0xE]
000000C0 486E FFFC pea.l [A6 - 0x4]
000000C4 2254 movea.l A1, [A4]
000000C6 2069 0020 movea.l A0, [A1 + 0x20]
000000CA 2F10 move.l -[A7], [A0]
000000CC 4EAD 03EA jsr [A5 + 0x3EA /* export_121 */]
000000D0 4EAD 0132 jsr [A5 + 0x132 /* export_34 */]
label000000D4:
000000D4 285F movea.l A4, [A7]+
000000D6 4E5E unlink A6
000000D8 205F movea.l A0, [A7]+
000000DA 504F addq.w A7, 8
000000DC 4ED0 jmp [A0]
000000DE 0000 4E56 ori.b D0, 0x56 /* 'V' */
// begin alternate branch 000000E0-000000EE
export_376:
fn000000E0:
000000E0 4E56 FEFE link A6, -0x0102
000000E4 48E7 0138 movem.l -[A7], D7,A2,A3,A4
000000E8 286E 0008 movea.l A4, [A6 + 0x8]
000000EC 2054 movea.l A0, [A4]
// end alternate branch 000000E0-000000EE
export_376: // at 000000E0 (misaligned)
fn000000E0: // (misaligned)
000000E2 FEFE 48E7 .extension 0xEFE <<F/2-3/7>> // unimplemented
000000E6 0138 286E btst [0x0000286E], D0
000000EA 0008 2054 ori.b A0, 0x54 /* 'T' */
000000EE 1028 0037 move.b D0, [A0 + 0x37]
000000F2 677A beq +0x7C /* 0000016E */
000000F4 C02E 0010 and.b D0, [A6 + 0x10]
000000F8 6774 beq +0x76 /* 0000016E */
000000FA 2254 movea.l A1, [A4]
000000FC 2069 0024 movea.l A0, [A1 + 0x24]
00000100 2050 movea.l A0, [A0]
00000102 45EE FF00 lea.l A2, [A6 - 0x100]
00000106 703F moveq.l D0, 0x3F
label00000108:
00000108 24D8 move.l [A2]+, [A0]+
0000010A 51C8 FFFC dbf D0, -0x6 /* 00000108 */
0000010E 266E 000C movea.l A3, [A6 + 0xC]
00000112 41EE FF00 lea.l A0, [A6 - 0x100]
00000116 2748 0012 move.l [A3 + 0x12], A0
0000011A 3769 0030 0016 move.w [A3 + 0x16], [A1 + 0x30]
00000120 422B 001A clr.b [A3 + 0x1A]
00000124 426B 001C clr.w [A3 + 0x1C]
00000128 7000 moveq.l D0, 0x00
0000012A 2740 0030 move.l [A3 + 0x30], D0
0000012E 4267 clr.w -[A7]
00000130 2F2E 000C move.l -[A7], [A6 + 0xC]
00000134 4EAD 085A jsr [A5 + 0x85A /* export_263 */]
00000138 3E1F move.w D7, [A7]+
0000013A 4A47 tst.w D7
0000013C 660E bne +0x10 /* 0000014C */
0000013E 4267 clr.w -[A7]
00000140 2F2E 000C move.l -[A7], [A6 + 0xC]
00000144 4267 clr.w -[A7]
00000146 4EAD 0432 jsr [A5 + 0x432 /* export_130 */]
0000014A 3E1F move.w D7, [A7]+
label0000014C:
0000014C 206E 000C movea.l A0, [A6 + 0xC]
00000150 7000 moveq.l D0, 0x00
00000152 2140 0012 move.l [A0 + 0x12], D0
00000156 206E 000C movea.l A0, [A6 + 0xC]
0000015A 2254 movea.l A1, [A4]
0000015C 2169 002C 0024 move.l [A0 + 0x24], [A1 + 0x2C]
00000162 206E 000C movea.l A0, [A6 + 0xC]
00000166 2169 0028 0020 move.l [A0 + 0x20], [A1 + 0x28]
0000016C 6002 bra +0x4 /* 00000170 */
label0000016E:
0000016E 7ED5 moveq.l D7, 0xFFFFFFD5
label00000170:
00000170 4A47 tst.w D7
00000172 6608 bne +0xA /* 0000017C */
00000174 1D7C 0001 0014 move.b [A6 + 0x14], 0x1
0000017A 6018 bra +0x1A /* 00000194 */
label0000017C:
0000017C 206